home *** CD-ROM | disk | FTP | other *** search
/ AOL File Library: 2,801 to 2,900 / aol-file-protocol-4400-2801-to-2900.zip / AOLDLs / TAWUG / TAWUG Disk No. 20 (SHK) / TAWUG.20 / CL < prev    next >
Text File  |  1986-03-17  |  512b  |  11 lines
  1.  0  REMAPPLEWORKS DATA DISK CATALOGUING PROGRAM
  2.  1  REMBY ROBERT J. SCHACK
  3.  2  REMDECEMBER 22, 1985
  4.  10  GOSUB 300
  5.  20 D$ =  CHR$ (4): REMCONTROL-D DOS COMMAND
  6.  30  VTAB 14: HTAB A%(1): PRINT A$(1): REMPRINT CHECK PRINTER POWER MESSAGE
  7.  40  VTAB 16: HTAB A%(2): PRINT A$(2);: REMPRINT INSTRUCTIONS TO CONTINUE
  8.  50  GET KEYPRESS1$
  9.  60  HOME : REMCLEAR SCREEN
  10.  70  IF KEYPRESS1$ <  >  CHR$ (13) GOTO 40: REMIF ANY RESPONSE OTHER THAN <RETURN>, PRINT INSTRUCTIONS TO CONTINUE AGAIN AND WAIT
  11.  80  VTAB 14: HTAB A%(3)